home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / Pascal / Libraries / GrafSys 2.0 / GrafSys 2.0 source / GeoBench Interface next >
Encoding:
Text File  |  1993-05-10  |  415 b   |  20 lines  |  [TEXT/PJMM]
  1. unit GB3D;
  2. { GB3D is the specific interface for the GeoBench. It extends the generic }
  3. { 3D object to a class that takes advantages of the structures found in }
  4. { the geobench }
  5.  
  6.  
  7. interface
  8.     uses
  9.         Matrix, GrafSysCore, GrafSysScreen;
  10.  
  11.     type
  12.         TGBPolygon3D = object(TSGenericObject3D) { polygon connects all points sequentially and back to the first }
  13.                 procedure Draw;
  14.                 override;
  15.             end;
  16.  
  17. implementation
  18.  
  19.  
  20. end.